home *** CD-ROM | disk | FTP | other *** search
/ cyber.net interactivo 5 / inter@ivo 1996-06.iso / cybint5 / bin / sector.dxr / 00010.ls < prev    next >
Encoding:
Text File  |  1996-05-13  |  1.4 KB  |  59 lines
  1. on enterFrame
  2.   global Gmovie, Gframe
  3.   set Gframe to 8
  4.   set Gmovie to "sector"
  5. end
  6.  
  7. on exitFrame
  8.   if rollOver(25) then
  9.     set the visible of sprite 25 to 1
  10.   else
  11.     set the visible of sprite 25 to 0
  12.   end if
  13.   if the mouseCast = 44 then
  14.     set the visible of sprite 26 to 1
  15.   else
  16.     set the visible of sprite 26 to 0
  17.   end if
  18.   if the mouseCast = 45 then
  19.     set the visible of sprite 27 to 1
  20.   else
  21.     set the visible of sprite 27 to 0
  22.   end if
  23.   if the mouseCast = 46 then
  24.     set the visible of sprite 28 to 1
  25.   else
  26.     set the visible of sprite 28 to 0
  27.   end if
  28.   if (the mouseCast = 8) or (the mouseCast = 20) then
  29.     if the visible of sprite 6 = 0 then
  30.       set the visible of sprite 6 to 1
  31.     end if
  32.   else
  33.     set the visible of sprite 6 to 0
  34.   end if
  35.   if (the mouseCast = 7) or (the mouseCast = 19) then
  36.     if the visible of sprite 7 = 0 then
  37.       set the visible of sprite 7 to 1
  38.     end if
  39.   else
  40.     set the visible of sprite 7 to 0
  41.   end if
  42.   if (the mouseCast = 23) or (the mouseCast = 74) then
  43.     if the visible of sprite 16 = 0 then
  44.       set the visible of sprite 16 to 1
  45.     end if
  46.   else
  47.     set the visible of sprite 16 to 0
  48.   end if
  49.   if (the mouseCast = 5) or (the mouseCast = 121) then
  50.     if the visible of sprite 19 = 0 then
  51.       set the visible of sprite 19 to 1
  52.     end if
  53.   else
  54.     set the visible of sprite 19 to 0
  55.   end if
  56.   updateStage()
  57.   go(the frame)
  58. end
  59.